Составить программу для вычисления значения функции — PureBasic(Бейсик)

disel
1
2
3
(-1)в степени х cos(Пи/4+х/25)
P=------------------------------- , для х=0 до 10, шаг 1
(Пи/4+х/25)
1
2
3
4
5
6
7
8
9
dim x as Integer
dim P as Double
const Pi = 3.14
CLS
for x = 0 to 10
p = (-1) ^ x * cos(Pi / 4 + x / 25) / (Pi / 4 + x / 25)
print p
next x
end

Похожие записи/страницы:

Leave a Comment